From 2ea4c91d97d90dbc918e9a123b80e7a4376ee0b7 Mon Sep 17 00:00:00 2001 From: justbur Date: Thu, 15 Oct 2015 10:52:48 -0400 Subject: [PATCH] Satisfy compiler for golden-ratio-mode --- which-key.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/which-key.el b/which-key.el index 49731d71d0f..7008f1bb64b 100644 --- a/which-key.el +++ b/which-key.el @@ -42,6 +42,9 @@ (require 's) (require 'dash) +(eval-when-compile + (defvar golden-ratio-mode)) + (defgroup which-key nil "Customization options for which-key-mode" :group 'help @@ -659,7 +662,7 @@ addition KEY-SEQUENCE NAME pairs) to apply." RECURSING is for internal use." (when recursing (define-key map key def)) (map-keymap - (lambda (ev df) + (lambda (_ev df) (when (keymapp df) (which-key-define-key-recursively df key def t))) map)) @@ -1484,6 +1487,7 @@ Will force an update if called before `which-key--update'." (which-key--show-page page-n) loc2)))) + (defun which-key--create-buffer-and-show (prefix-keys) "Fill `which-key--buffer' with key descriptions and reformat. Finally, show the buffer." -- 2.30.2